home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 08p3.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-06  |  2.0 KB  |  71 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie, gCursorReady, gKnobState
  3.   puppetSprite(48, 1)
  4.   gCursorReady = 1
  5.   gKnobSprite = 14
  6.   gSendMovie = "08p3"
  7.   gKnobState = 1
  8.   puppetSprite(gKnobSprite, 1)
  9.   setUpKnob()
  10.   setUpKnob()
  11.   set the mouseDownScript to EMPTY
  12.   set the mouseUpScript to EMPTY
  13. end
  14.  
  15. on idle
  16.   global gCursorReady
  17.   if gCursorReady = 1 then
  18.     cursor(200)
  19.     checkCursors()
  20.     set the locH of sprite 48 to the mouseH
  21.     set the locV of sprite 48 to the mouseV
  22.     updateStage()
  23.   end if
  24. end
  25.  
  26. on checkCursors
  27.   global gMagCursor
  28.   gMagCursor = "magCursor"
  29.   set the castNum of sprite 48 to the number of member "curs1"
  30.   if the castNum of sprite 5 and rollOver(5) then
  31.     set the castNum of sprite 48 to the number of member gMagCursor
  32.   end if
  33.   if the castNum of sprite 6 and rollOver(6) then
  34.     set the castNum of sprite 48 to the number of member gMagCursor
  35.   end if
  36.   if the castNum of sprite 7 and rollOver(7) then
  37.     set the castNum of sprite 48 to the number of member gMagCursor
  38.   end if
  39.   if the castNum of sprite 8 and rollOver(8) then
  40.     set the castNum of sprite 48 to the number of member "deMagCursor"
  41.   end if
  42.   repeat with i = 15 to 17
  43.     if rollOver(i) then
  44.       set the castNum of sprite 48 to the number of member "hotCursor"
  45.     end if
  46.   end repeat
  47.   repeat with i = 20 to 23
  48.     if the castNum of sprite i and rollOver(i) then
  49.       set the castNum of sprite 48 to the number of member "hotCursor"
  50.     end if
  51.   end repeat
  52.   repeat with i = 26 to 28
  53.     if rollOver(i) then
  54.       set the castNum of sprite 48 to the number of member "linkCurs"
  55.     end if
  56.   end repeat
  57.   repeat with i = 30 to 32
  58.     if rollOver(i) then
  59.       set the castNum of sprite 48 to the number of member "hotCursor"
  60.     end if
  61.   end repeat
  62.   repeat with i = 40 to 42
  63.     if rollOver(i) then
  64.       set the castNum of sprite 48 to the number of member "hotCursor"
  65.     end if
  66.   end repeat
  67.   if the castNum of sprite 47 and rollOver(47) then
  68.     set the castNum of sprite 48 to the number of member "hotCursor"
  69.   end if
  70. end
  71.